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VYOCALIZE? Yes, with the Z-GRASS-32 Add Under. Latest word, just 
received two days before we went to press-via The SOURCE, is that the 
Add-Under wil! have a “talking” voice interface! More details on this as 
they come in, but for the present, the specifications for the Add-Under 
have been decided upon by all concerned parties, and the unit is GO for a 
late ‘8i delivery. It will not have a built-in disc interface capability, 
but will be configured to accept this as a plug-in optional feature. RAM 
count is now 16K, while ROM is 32K. The 16K RAM will be expandable to 64K 
Hy simple substitution of chips plus a couple of board wiring changes. The 


disc interface will expand the RAM to 64K, so that the full up system could 
have 128K of memory! 

O STATUS of other efforts: The following cartridges are in manufacture: 
GALACTIC INVASION, BIORYTHMS, and PIRATES CHASE. In work and almost ready 
to go are: SPACE FORTRESS, CHECKERS, and MUSIC. This last cartridge will 
have a 6K program to self-store your musical compositions while you are 
working on them, plus a built-in tape cassette interface to ailow you to 
directiy transcribe to and from tape for long-term storage. The Arcade 
itself is in production, as is the new AstroVision Basic cartridge, and the 
manual for the cartridge is now being proof-read. Scheduled availability 
date of the Basic is late August. ; 

@ PERSONNEL CHANGES Michael Peck is now the President of AstroVision, 
replacing Dan Dawson in the third week of June. I spoke with Mr. Peck, and 
he if vers interasted in getting the AstroVision steam roller under way. 
John Perkins is working for AstroVision as a consultant, primarily 
interested in getting the Add-Under into production, while Brett Bilbray is 
also working for them, with responsibilities in the production Arcade area. 
George Moses is doing a lot of work for AstroVision in the production of 
the new Manual to accompany the AstroVision Basic cartridge. 

@BALLYCHECK is tha name given by Dick Belton to his version of the Balcheck 
program the factory uses to chack the motherboards prior to installation in 
the cases. I received a sample of his effort - it is a compact box, about 
2x2x4, with two LEDs for readout, and two cables to connect to the Arcade. 
One goes to the S@-pin connector, the other to the 5 volt supply at the 
light-pen connector. Once plugged in, it goes through the routine of 
checkout, and if a failure is found, the LEDs indicate the area of failure 
using a code system. It also includes the machine code input routine. 
Check Dick’s ad on p. 18@. 

° EDGE TAGS are again being sold by Roger Saunders. These little stick-on 
labels are placed on the spine of your game Videocades so that you can read 
the subjects when the ‘’cades are stored in the Arcades’s rack. Also 
included are labels for the hand controlter plugs. See his ad on p.97. 

L & M Software report that they expect their prices to rise soon, so a word 
to the wise... 

© SPINNING WHEEL is a combination program that Tom Owczarek uses at’ Faires as 
a fund raiser. The first part takes the place of the old ’round and around 

_ she goes’ wheel of fortune with an RNDC38) plus exploding box display while 
the computer is deciding which of the 3@ numbers is the chosen one. Then 
there are three designs and dummy advertising messages which you would 
want to change for your own usage. Use GO to restart the game, and always 
wait for “Place Your Bats" before making any entries. 





(c) 1981 Robert Fabris 
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- SPINNING WHEEL 


BC=266;FC=215 


GOSUB 2548 

&C16)=176 

NT=1 

CLEAR 

2=6 

CxX=-20;CY=25;PRINT "SPINNING" 
BOX 29,6,246,16,3 

FOR A=RND (38) 

CX=-14;CY=8 id 


PRINT A 
B=RND (38)62;BOX -5@,-28,B,B,3 
Z=7+1 

IF Z<S@GOTO 6a 

CLEAR 

CX=-18;CY=35 

PRINT "STOP" 

FOR Z=1TO 258;NEXT Z 

CY=28;PRINT " WINNING NUMBER IS" 
FOR Z=1TO 25@;NEXT Z 

CX=-15;CY=8 

PRINT “a ",#1,A," _" 

FOR M=i1TO 28@@;NEXT M 

CY=-25;PRINT “ PLACE YOUR BETS!" 
PRINT " MAX. 4 NO. PER PERSON" 
M=KP . 

IF M=1L3GOTO 15 
IF M=49GO0TO 356 
IF M=S@GOTO Sasa 
IF M=SiGoToO saa 





GOTO 196 

CLEAR ;2=8 Tom Owczarek 

NT=8 2126 Garrick 

&( 183=142 Warren, MI 48691 
Z2=2Zt+1 


IF Z2=27GOTO 308 

CY¥=-23;PRINT " GOOD LUCK ! 

FOR Z=1TO 156@;NEXT Z;CLEAR ; RETURN 
BC=111;4(9)=255; CLEAR ;LINE -86,18,0 
FC=6;&C1@3=176;NT=3 

FOR A=-86TO 8S6;LINE A,RND CABSCA}+1)-16,1 
NEAT ASLINE @,-14,@;A=18 

FOR C=1TO 26STEP 2; A=A+C; B=Ac6; BOX A-3,-B,1+Bc2,Bb1G,1 
BOX A-3,Bb3, Bb5,1+Bc2,1;NEXT C;FOR A=-38TO 39 ‘ 
LINE A,-44,1;LINE @,-18,@;NEXT A;FOR A=-44TO -LISTEP 8 
BOA 8,A,ABSCAIcC1B,ABSCAICE,2 


",3;60TO 2748 


NT=16;CY=-15;PRINT “ P.A.S.S. 

CY¥=-25;PRINT "“ BOOTH : - 
NEXT A;FOR Z=1TO S@@Q;NEXT 2 : 

NT=1 


&(93=58; BC=200;FC= 215; GOTO 174 

CLEAR 3;&(€21 )=6;&( 1@)=176;NT=3; BOX @, -40,158,6,1 
BC=246;FC=7 

FOR A=1TO S@;BOxX RND (16@)-88,RND (Be? Riad, 1, < 1;NEAT A 
BOX @,-24,34,140,1;BOxX @,4,20,34,1.. 
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LINE @,8,@;LINE -46,-4@,1;LINE 4@6,-48,1;LINE @,8,1 
LINE @,-2@,@;LINE -4@,-4@,1;LINE 4@,-4@,1;LINE @,-280,1;CY=44 
PRINT “ WE’ RE OUT OF THIS WORLD 

FOR Z=1TO 756;NEXT 2Z;BOX @,-18,5,18,2 


5S7@ FOR Z=1TO 1S@@;NEXT 2;BOX 45, -28,2,38, 1; BOX. 5B, -9,260,14,1 

S60 BOX 53,-6,9,6,2:B0K 58,-15,16,1,2;B0X $9,-13,18,1, 23 BOX.58,-11,;18.1,2 
994 BOX 62,~9,9,1,2;BOX 62,-7,9,1,2;BOX 62,-5,9,1,2;NT=1;FOR Z=1TO S@84;NEXT Z; 
GOTO 178 

664 CLEAR ;NT=8 

605 BC=122;FC=7 

516 FOR A=35TO 37;CLEAR 

626 FOR B=1TO 285; TV=A;NEXT B 

625 FOR C=-8@TO 7SSTEP 4;BOX C,@,1,88,3;NEXT C 

628 FOR C=43TO -43STEP -2;BOX -2,C,156,1,3;NEXT C 

630 FOR X=1TO 15@8;NEXT X 

632 IF A=35GOTO 65a 

633 IF A=36GOTO 7b 

635 NEXT A 

646 BC=266;FC=215 

645 NT=1;FOR Z=1TO SOBG;NEXT Z:CLEAR ;GOTO 178 

656 CLEAR 

651 NT=7 

B53 PRINT ;PRINT ;PRINT " PARENT ASSOCIATION"; PRINT ;PRINT “ OF"; 
PRINT 

655 PRINT ” SCHOFIELD SCHOOL“ 

566 PRINT ;PRINT ;PRINT ;PRINT “ WELCOMES YOU TO THE FAIR! 

664 NT=8 

665 FOR 2=1TO 3566;NEXT 2 

670 GOTO 635 

708 . 

7@1 NT=4 

785 PRINT ;PRINT ;PRINT ;PRINT ;PRINT ;PRINT 3;PRINT s;PRINT ;PRINT 3; PRINT ; PRINT 
;PRINT 

715 CY=@6;PRINT “ HAVE A NICE DAY : 

724 GOTO 664 


EEE 
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= DIAMONDS 
S BY ROBERT ROSENHOUSE 
4 SUPER SOFTWARE 
2 
1@ CLEAR ;B=24;C=25; D=328 
24 FOR T=1TO DSTEP 2;*%=RND (68);5Y=RND (27); 60 T)=X;@C T+13=¥ 
34 FOR A=1TO BSTEP 2;B0XK X,7¥,A,C-A,3;NEXT A 
49 FOR A=1TO BSTEP 2; BOX -X,Y,A,C-A,3;NEXT A 
54 FOR A=1TO BSTEP 2;BOX -X,-Y,A,C-A,3;NEXT A 
66 FOR A=1TO BSTEP 2; BOX X,-Y,A,C-A,3;NEXT A 
7@ IF RND €7)=1BC=RND (256);FC=BC+4+S8bRND (32) 
66 NEXT T 
36 FOR T=1TO DSTEP 2;FOR A=1TO BSTEP 2 
1@@ BOX @CT), @CT+1),A,C-A,3; BOX -@(7T),@CT+13,A,C-A,3; BOX -@CT),-@CT+1),A,C-A,3; 
BOX @(T),-@CT4+1),A,C-A,3 
116 NEXT A;NEXT T; RUN rs 


wr ~ ran epmmeretes 
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@HI RES Modification as created by Perkins Engineering - latest word is that 
the system is available to experimenter-tupes who can do their own 
programming. Due to other committments at the present, Perkins is not 
available to develop software. So if you want to work on it yourself, and 


a a real originator, you can buy the kit at $254, or the built up“tested 
unit at $356 Cusing your board). 


® «K = 
LUDGE Board written up on pagefZhas an error in the transistor callout, 


it should be 2N44@1 Barr 
: y Ellerson now has some p.c. b d 
a clock kit - see his ad on p. 188. ie eB aecee Ot Os 


Pool is a computer version of the Billiards 
game 8-Ball. The computer will rack the 
balls and break. The direction of the Cue 
ball is controled. by JX(1) & JY({1). The 
length of the shot is controled by the Cue 
stick at the right of the screen. After 
selecting the desired angle & length, pull 
the trigger TR(1) to make the shot. The 
direction of any other balls hit by the Cue 
ball is controled by KN(1). If KN(1) is at 
its center the other balls will continue in 
the same direction as the Cue ball. Turning) 
KN(1) all the way clockwise or counter- 
clockwise will deflect the balls 45 degrees 
from the path of the Cue ball. ‘Listing —pa 












2206 POOL 
eece® -. # 
BOB HENSEL 


3328 Red Fox Run 


TERICA $9.50 Warren, Oh. 
’ 44485 
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BTAR THEK MINI GOLF 


BOX 94801 
A wame of computer publ-putt for SCHAUMBURG, IL 60193 


$10.95 POST-PAID 


You ere at the helm of the 
400,000 metric ton star ship 
looking through the front view- 
screen into deep space. It i8 a 
weary ship. You have already 
done battle wath a class 1 
‘cruiser and destroyed a Klingon 
outpost. Suddenly. a siren 
sounds "Ked Alert "Klingon 
Battle Cruiser" flashes across 
the sensor readout as the vessel 


one to four players. Use the 
joystick to line up your shot. 
Hit the ball hard or soft or with 
the perfict"Golfer's Touch." Bank Qt 
it off the side boards for those 
tricky" shots but don't hit it 
too hard cr you'll end up in the 
rough. Computer keeps running 
score for one to four players, 
includiny, penalty strokes. It 
appears on screen,very small et {also prints pluyer up and hole no. 
first, but getting larger.He's 
attacking ab warp factor 6! 
Before you react tht enemy fires! 
4n alarm sounds! Engineer ing re 
ports the hit damaged the photon 
torpedos & the forward shield is 
still weakenea from tae last 
battle. Another enemy blast fille 
the screen as it's about to hit. 
You must act quickly! You are not 
yet in phaser range. What will - 


you do? STAR IREK,the aggressive 


seoses 


Both progre s make full use of INSPIRED 
. : BY THE EXCITING MIDWAY ARCADE GAME PAC-MAN, MIKE PEACE HAS CREATED THIS 

color graphic and sound effects, VERSION OF THAT GAME FOR THE HOME COMPUTER. THIS GAME HAS THE EXCITEMENT OF PAC-MAN 
and perform more functions that WITH A FEW CHANGES. YOU MUST EAT UP ALL THE DOTS WHILE AVOIDING THE CAT WHO IS IN 
HOT PURSUIT OR WAITING TO JUMP ON YOU. FROM TIME TO TIME YOU MUST STOP EATING THE 

can be listed here. Send check Ha Elie te Get i THE CHEESE (BONUS) FOR A MAXIMUM SCORE. THE HIGH SCORE IS KEPT 

: ; : CHALLENGE TO TRY TO BEAT. GREAT FUN. HAS BEEN SAID TO BE BETTER THAN 

or money order to: A LOT OF BALLY'S OWN CARTRIDGES. USES HAND CONTROL. EXCELLENT SOUND EFFECTS IS IN 

Esoterica Ltd. BOTH NEW AND OLD BASIC. LOADS QUICKLY. $10.95 POST PAID. 


3328 Red Fox Run 
Warren, Ohio 44485 





game from Esoterica Ltd. 
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1@ .POOL } 
2@ .BY BOB HENSEL ° 
3@ :RETURN 3;&(9)=39; &(@)=170; &( 1)=178; &( 2)=38;&(3)=38;CLEAR ;BC=178; FC=7 
46 S=1;T=@;NT=@;BOX -3,-2,155,93,1;BOX -3,-2,152,79,2. i 
5@ X=75;FOR Y=-42TO 38STEP 2;BOX X,¥,1,1,13;NEXT YsX=763FOR Y=-42T0 SS8STEP 18:8 

OX X,Y,1,1,13NEXT ¥ 
6@ X=76;FOR Y=-42TO 38STEP 19; BOX x, Y, i, 1; 1:BOX -78, 32, 20,12,1;BOX -7@,-35,20, 

12,1;BOX @,-35,23,12,1 
7@ BOX 64,-35,18,12,1;BOX 64,32,18,12,1: BOX @,32,23,12,1 7 
8@ CY=18;CX=19;PRINT "POOL";CY=-1@;CX=-8;PRINT "BY BOB HENSEL";NT=5 
98 X=-30; Y=4; B=-8;D=1;FOR. A=1TO 5;FOR C=1TO D3 Y=Y-6;B=B+9; IF B>1@B=1 
18@ GOSUB 48@;NEXT. C;D=D+1; Y=ABSC Y )+63 X=X-6; NEXT AD 

11@ BOX -42,-2,1,3,3;BOX -42,-2,3,1,3 Ret i 
120 B=@:;Y=-2;FOR X=36TO -24STEP -6;GOSUB 498;GOSUB 4003 NEXT ie 
146 FOR A=1TO 8;FC=98;FOR C=1TO S@;NEXT.C;MU=60;FC=7;NEXT A:BOX @,-2,144,42,2 
154 @(@)=RND (19)4+5;@C16)=RND (4)4+5;@(C33)=-71;@(34)=37;GOSUB 460;GOSUB 480;FOR 
B=1TO 15 

168 @(B)=RND (19343; @(B+16)=RND (12)41:GOSUB 46a a Gere 

17@ GOSUB 4@@;IF PX(X+2, ¥+2)=@60SUB 47a v4 

18@ NEXT B;GOTO 218 

198 @(€@)=13;@( 16)=7:GOSUB 4@9;GOSUB 460;GOSUB 428 

288 @(33)=@(33)-6 

218 S=S+1;C=-48;Q=2;BOX 79,8,2,898,2 | 

226 BOX 79,C+Q,2,2,1;IF TRC1J=1GOTO 2708 

238 QG=Q+2;IF Q@<8@GOTO 228 

240 BOX 79,C+Q,2,2,2;IF TRC 1)=1GOTO 278 

258 Q=Q-2;IF Q@<@GOTO 238 

266 GOTO 249 

270 B=@;Q=Qc2;MU=68;IF JXC1)=6IF TYC1)=BG6OTO 300° 

275 GOTO 298 ’ 

28@ W=KNC1I:IF ABSCWI<GSGOTO 380° 

28? W=Wc6S;IF V=8V=W; GOTO: 308 

284 IF H=@H=W;GOTO 398 ; 

286 H=4;GOTO 388 

298 H=JXC1);U=TYCL) : 

380 GOSUB 468; J=*+Hb6; K=Y+Ub6; IF (J<- 75)+(3>70 He ~Hi MU=68; GOTO 3808 
34 IF (K<-48)4+(K335)U=-U;MU=60;GOTO 308° es Gee 

306 IF PXCJ,K+2)=8GOTO 330. 

310 C=B;FOR A=@TO LS;IF (@CA)= @CBI+HbC@( AFLG =@C BF16 +U BHA 

328 NEXT A:IF BC MU=68;:GOTO 289 ° 5 

338 BOX X,Y,5,5,2 | E43 

348 X=J;@( B)=@( BJ+H: Y=K; @(CB+16)= @( B+16)4U; GOSUB 498 | i 
356 IF PX(X+2,Y+2)=@GOSUB 470;Q=@;IF B=@GOTO 19°. 2 Be 
388 Q=Q-1;IF Q@>@GO0TO 380. : pe eh Lee 





446 MU=50;IF B=6BOxX X,Y,3, 3, 3 5SS@ PRINT ;CX=-41;IF T#1S5PRINT "8 BALL LOSER 


416 IF B>7BOX X,Y,1,3,3 S68 IF TRC1)=160TO 3a 
426 IF B=8BOX K,Y¥,3,1,3 — S78 GoTo ing 


43@ BOX X,Y,5,5,3;RETURN | ie 
448 @(33)=@(33)+6; IF B>8@( 33 )=@( 33 )-65@( 34 )= 034946. 
45@ RETURN 

468 X=@( B)b6-75; Y=@( B+16 )bG-44; RETURN 

478 GOSUB 480; Y=41;X=@(33);@(B)=0;IF B>8x=@( 34) 


488 MU=70; MU=71; MU=723 MU=733 MU=743 MU=5@; MU=49;: GOSUB 48G;GOSUB 440;IF Be@T=T+1 


516 IF T=i1SGOTO 548 











528 IF B=8GOTO 548 
@( BJ=30; RETURN 








39@ GOTO 218 aia WOR Ga cas ao a ee on aveeraa “GAME OVER 




















6465 


1468 
1465 


4 NEXT AS STOP 





.OLD BENT NOSE 
.BY BOB WISEMAN 
Q=1180;GOTO Q 
A=12;GOSUB H;GOSUB I 
GOSUB K;IF UGOTO 198 
B=A+W-SbU; IF A=BGOTO N 
IF (B¢@)+(B>24)GOTO N - . | 
GOSUB I;A=B;GOSUB H;GOSUB I;FOR X=1TO 3; MU=25; NEXT x 
GOSUB K;IF VbU+WbWGOTO 17a 
GOTO N 
IF @CA)<@GOTO N 
GOSUB I;RETURN 
GOSUB 68@;GOSUB 1@@;L=A;IF @(L)=@GOSUB 190@:GOTO D 
GOSUB 5@@;GOSUB 1@@;IF A=LGOSUB 228 
IF @(AJ=BGOSUB 18@4;A=1.;GOSUB H;GOSUB J;GOTO D. 
GOSUB H;GOSUB 5@@;FOR X=1LTO Q:NEXT X 
IF @CA)#@(LIGOSUB 7@8;GOTO D 
GOSUB 88@;GOTO BD 
W=AcS;C=28- LSbW; R=RMb 15-26; RETURN 
BOX R,C,15,15,3; RETURN 
U=TROP 3; V=TYCP )3W=IX¢ P33 RETURN 
BOX R,C,15,15,1;BOX R,C,13,13,2 
IF T=1LBOX R,C,11,5,1;BOX R,C,5,11,1 
IF T=2BOX R,C,11,11,1;BOX R,C,7,7,;2 
IF T@CAJ=-T | 
RETURN 

=@(A)c2;BOX'R,C,11,11,1 
S=C+3;G=RM; IF GBOX R-3,S,1,3, “ BOX R-3,S, 3, 1, 25 BOX R+3,5,1,3,2;BOX R+3,S,3, 





IF G=@BOX R-3,5S,3, a, 2;BOX R-3, S, 1, 1,13 ies R+3,5,3,3,23; BOX R+3, SF ii i54 
F=Fe2;7=RMS IF YBOX R,C,1,1,2 

IF Y=@BOx R,C,3,1, 2; BOX R, C2, 1,3, 2. 

F=Fc3; BOX R,C-3,7,3,2 

IF RM=OBOX .R,C-2,5,3,1° 

IF RM=1B0OxX R,C-4,5,3, 1 aNbly > 

NT=30; MU=49+95G6; MU=49+9bY5 MU=49+4bRM; NT=3; RETURN: 

P=3-P;CX=M;PRINT “PLAYER",#2,P,"°S. eee ey IF: P=2BC=55 

RETURN | 

T=6;GOSUB J;A=L; GOSUB: H; GOSUB Tt 

CX=M;PRINT "IS NOT A MATCH * ) sRETURN: nd 

T=P;GOSUB J;GOSUB 85@;A=L;GOSUB. ‘Hg GOSUB. Ji ‘densa ‘856 

CX=M;PRINT “MATCH! ! MATCHEE*,~ 

FOR AX=O8TO 24;1F @CX)>@RETURN: et 

NEXT X;CX=M;PRINT “IT’S A DRAW. ",3;GOTO 916 

B=AcS; C=RM; B=BbS Pe ae 
FOR KX=@TO 2. ; ‘x § 
IF (@(B)=@( B+1) b(@C B+ = @(B+2) GOTO 988 . 
IF COCCI=@C CHS ) oC @C C45 )=@(C+14) GOTO 380 
B=B+1;C=C+5;NEXT X; RETURN 

CA=M;E=1;PRINT “YOU HAVE WONT IE", 

FOR A=6TO 24;GOSUB HiIF @(A)=8GOSUB 1ga0° 
IF @CA)>BGO0SUB 5a 


BOX R,C, Ei, ti, is BOX Wie-35,9,122 
FOR x=@TO 3;BOX% R-3+2bX%,C-3,1,3,2;NEXT X 





te TR 











Se, 
Me, 
Pace. 






ARCADIAN 


1914 BOX R+3, c+3, 3,3,2;BOX R+3,C+3,1,1,1;BOX R- ~o,C, 
1626 BOX R-1,C+2,1,1,2;BOX R, C+3,1,3,2; BOX R- “3; c+3, 
1425 IF ERETURN 

1638 CX=M;PRINT "ACK! BENT: NOSE!", 

1456 FOR X=1TO 36; MU=87 NEXT X;T=@;GOSUB J; CX=Mi ne a HIDES AGAIN ", 
1988 R=RND (24); IF @CRI<1GOTO 1880 

169@ @(A)=@(R);@(RI=@; RETURN “2 

1168 T=8;P=2; M=-4@; CY=4@; CLEAR ;H=310; T=320; J=48@;K= 330;N=110 

1118 FC=119;E=@;FOR A=aTO 24;GOSUB H;GOSUB J 

112@ B=Ac13;@(A)J=RM+1;NEXT A; @(12)=9 

1136 FOR A=8TO 24;B=RND (24); C=@(AD5 @CA)=@( B)5@CB)= =CsNEXT A 

1146 D=288;GOTO D 
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SLAYED ON & FIVE IVE GRIG. THE 
CSUECT OF THE GAME IS TO GET THREE mr VEU FIQRRE RSS TN eS TRA TORT 
LINE Moet? COIN TALL. ¥ Ce VEST POALLY. FLGYERS MAS EEE 
PLAYERS TW LISES FERGIE, CN THE GRIt, TWELVE pele ges 
RIN bP 1S ent TURN LESE THE JX ANID wy ON THE Ane PONTRELL 
MaNWEVER THE REVERSED BOX To THE: SOWARE THAT YOu WANT TO GUE 
THE TRIGCER., NCI GUESS ANOTHER TRYING TO PING THE MATCHIE 


ie THE TWO FACES THAT YOU HAVE E SAR ONSET MATCH. THEN YO i Mie Pee EO 
LPP I THCESE 


TN &® LONE COT DTAGONALLY) WIRE. BUT WATCH 
ioe, SIDS OE THe Re. fl. IF YOU PICK HIS SaUARE. rere 
AND OLD BENT NOE TRAQES PLACES WITH SNOTHER HODES Fa ne, 0 
OPED NESS GUESS DMG. MEMORY. AND STRATEGY, 


THiS TS A TWO SLAYER GAME 






f- “fe 





od Bike? PLAYER 00 dseq,, THREE. BF Mig ian K Soy aaa 
Lt Se CLC BE Mi pe 
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MUSIC FOR GAMES 
19 FOR A=256 TO PSTEP -4 
2) &(23)=A;&(21)=A;&(19)=299 BY MIKE PEACE 
3f IF A=4A=256;IF TR(1)A=9 
4) NEXT A: &(23)= 9;&(21)=9 






15 BALLY VIDEOCADE EDGETAGS. 
WITH 4 HAND CONTROL TAGS \ 
( ALL SCRATCH & MAR RESISTANT ) 


$3.50ser 


DEALER AND. CUSTOM PRICES AVAILABLE 
~ CALL (503) 238-5796 AFTER 5:30 


EASY TO DO YOURSELF . 









CHECK TO: 
ROGER SAUNDERS TAGS FOR NEW 
304 N.E. 55th ASTROVISION VIDEOCADES 


PORTLAND, OR. 97213 TO BE AVAILABLE SOON! 





22 Games ane now available AL 
use Full Memory & Display Lots 
of Gaaphies,Action, Sound and 
(olor. Any | /wo on (ass— 
ette.....510.00 


ltnite fon free pic- 
syne (Catalog. 


L&M Software 
cag A Da |, 


ewb eng oh 
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SuPER SOFTWARE 


Kighteen programs for the Bes We carry all game cartridges 
at low discount prices!! 















Bally Computer System!! ‘S 
‘ : Ke & 








NP! ae ' pares Software My “Wee. 

now offers nine sets Cat 
XP, 

re of programs for use with 

oa The Bally Computer System! Super Software 

Our programs are designed with 

~ routines that utilize all of the 

Bally's special features including sound , 


Super Software 



















color, and exciting graphics. We also carry 






all of the game cartridges for the Bally at low 





discount prices. Please write for our free catalog. 






SUPER SOFTWARE 


P.O. BOX 702 
PLAINFIELD, NJ 07061 






ONBOARD CALCULATOR, (%), has not been utilized fully. The ARCADIAN tutoria! 
on its basic’ operation was published in Vol 1, p.32. At that time, each 
digit of each number had to be individually entered, an arduous task. 
Then, in Vol 2, p.2, Gerry Halquist presented a loan payment program wth 
greatly simplified input, but still having restrictions Csuch as interest 
had to be entered in 5 digit format)... Now Jess Shadle has mads up a number 
of programs where the input format can be almost anything and the program 
wilf accept and utilize it. One program is included this issue, Compound 
Interest. Some notes: 

entering principal-you can use either $1006 or 1688.88 or § 1,686.09; 
if you do not use %, then you must press I after the amount. Entering 
interest, any of the following will work: 5.2% 452 5.2 but no 
fractions. Term of loan must be in years. If you make an error, HALT the 


program and start again. 
If you find this program of value to you in this application or any other, 


send Jess a buck to help keep his creative juices flowing. He currently 
is working on trig functions, quadratic equation solutions, sinking fund 
solutions, and similar programs - primarily for Blue Ram application. 


The capability to do these functions is not included in the AstroVision 
Basic, being removed for other features. The routine reside in the Bally 
Basic between locations 2194H and 2226H, plus some subroutine calls. When 
the VIPER system becomes more in use, one could transcribe the routine into 
the VIPER, store the routine on tape, and have it available for when the 


occasion demands. 


For those of you unfamiliar with the calculator format, it is, 
$n@¢x),@(y),E eCz) where n is one of the four arithmetic operators: + - x = 
; (#(x) will be the string location of one of the two numbers being worked 


on ‘thile @ly) is the string JIocation of the other. @(z) is the string: 


location of the answer. ; 
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»-COMPOUND INTEREST 
.BY JESS SHADLE 
CLEAR 

FOR A=@TO 165; @CAI=B; NEXT A 
FOR X¥=20878TO 26128STEP 23;4°XY3=B;NEAT XY 
F=168; G=288 


PRINT “COMPOUND INTEREST" Jess Shadle 


5=2 

7 Cul de Sac 
IF S=2P=6898;GOTO 75 West Chicago, IL 6@195 
CLEAR ;PRINT "“RUNNING*;RETURN . 


@( 98 )=2;@(99)=1;@C134)=1;PRINT “LOAN AMOUNT";PRINT ;GOSUB 3438 
CX=-32;Z=1;FOR B=RTO SSTEP -1;IF @(B)="@"IF ZGOTO 138 
IF V=@PRINT “$", :V=1 





TU=6( B) 
IF (B=11)+( B=29 )+( B=47 }+( B=65 )+( B=83 )+( B=1@1 9+ B=119)+( B=136 )+CB=155 PRINT 


NEXT B 

V=0; RETURN 

PRINT ".",;FOR B=TTO USTEP -1;TV=@C(B);NEXT B;PRINT ;V=@;RETURN 
IF E<2N=7 —— 

IF E=2N=25 6028 $-@(54),@(126),@(54) 

IF E=3N=61 ts030 IF @(62)+@(63)+@(64)<145G0TO 6a5e 


FOR I=1TO B 16848 GOTO 6B1B 
@(N+A)=@(165+3 8685Q PRINT "INTEREST+LOAN";R=17;S=8;GOSUB F:T=7;U=6;GOSUB G 
A=A-1;J=J+1 Esasi PRINT 

NEXT I ™ 

@( 46)=1 

IF E=2IF (@(26))+(@(27))+(@( 28) )>8%c@(18),@(36),@(18) 

A=0; B=0;C=0:J=@;PRINT ;RETURN 

CX=-38;CY=CY-8 

K=KP 

IF K=31 GOTO 18 

IF K=36TV=K;GOTO 3240 

IF K=37TU=K;GOTO 3048 

IF S>@IF K=13G0TO 3040 

IF K=44TV=K;GOTO 384@ 

IF K=46C=1:TV=46;GOTO 3240 

IF K=73E=1;GOSUB S@@;PRINT "INPUT INTEREST RATE, THEN";PRINT " PRESS T";P 
:CX=-2@;CGOTO 3940 | 

IF K=84E=2;GOSUB S@@;PRINT “INPUT YEARS, THEN";PRINT “PRESS P";CX=-28;GOTO 3 


IF K=8@E=3;GOSUB 5@8;GOSUB 68;GOTO P 
IF K=67STOP Jege@ U=1;PRINT “NUMBER OF PAYMENTS" ;R=187; 5-98; GOSUB F;T=973 


TV=K 'U=96;GOSUB G 
@(165+B)=K MHea6S PRINT 
B=B+1 6872 NT “MONTHLY PAYMENTS” 


IF C=LIF E=@U=U+1;IF. U=2K=73;GOTO 3a68 
IF C=OA=A+1 GaGa $ce(B),@(98),@(9);GOSUB F;T=97;U=96;GOSUB G 


GOTO 3048 saga PRINT “INTEREST PAID" 

$b@(54),@(98),e(98) ay $-@( OH), @(36),@(90);R=187;S=98; GOSUB F;T=97;U=96; 
FOR Q=38TO 53;@(Q)= oe he G0suE G 
$+6(0),@(36),6(36) , =e 

$b@(G),@C18),@( 144) ° 
$;@(8),@(0144),@(8) 
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FOR SALE Computer Ear with documentation and software, $55. aru Wohl, 

3513 Lynnfield, Shaker Heights, OH 44122 
FOR SALE Basic, Interface, all issues of Arcadian Hebel deters; Documents, 
16 cassettes, programs, manuals, and more. A must for the serious 
programmer. First $188 takes it. Robert Jaeger, SB Millay Rd. Morganyville, 
NJ @7751 201-536-3274 

FOR SALE Baly Basic with literature and Basic, Interface, 8 working hand 
controls, Football,Basebal!,Star Battle,Galactic Invasion (new) videocades. 
works great $308. contact James Schaefer 5314 Blackistone Rd. Bethesda, MD 
20016 301-229-8318 

CLOCK MOD KIT $9.80. Assembled and tested, $11. ppd. Attention! ! 
Experimenters, Servicemen!! Quality, double sided Kludge boards, $4.25 ppd. 
Quantity discounts! Please inquire Barry Ellerson S@17 N. River Rd., 
Schiller Park, IL 68176 312-635- 6859 
BALLYCHECK for problem diagnostics and out-of-case repairs: For Sale 
complete tested unit for $69. including shipping. Two to four week 


delivery. Kits may be possible. PROMs for BALLYCHECK now available, 
immediate delivery at $19.50 with listing if requested. Includes shipping. 
Arcade Boards repaired and/or tested - one to two week turnover $25 Min 


plus parts and = shipping. Contact Dick Belton 381-488-2886 between 4-18 pm 
Eastern time. : 
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CONTEST ENTRANTS this month were Bob Hensel, with POOL, and Bob Wiseman 


with Old Bent Nose. The winner of the $100 check will be indicated by a 
big #% on the program page. The winner will be determined by the judging 
panel who will let me know at the last moment, after this issue is 
complete. Anyway, at this time I can congratulate Bob, who will replace 
Dick Strauss on the panel. 
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